home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / a_utils / perl / prlbkxmp.lha / ch5 / varval.eg < prev   
Text File  |  1991-01-08  |  145b  |  6 lines
  1. eval "\$command_$1=\$2" while
  2.     $ARGV[0] =~ /^(\w+)=(.*)/ && shift;
  3.  
  4. eval "\$commandline'$1=\$2" while
  5.     $ARGV[0] =~ /^(\w+)=(.*)/ && shift;
  6.